home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / BUSINESS / SHOW15.ARJ / SOUND1.SHW < prev   
Text File  |  1991-06-01  |  519b  |  12 lines

  1. ***********************************************************************
  2. * Sciptname..:  SOUND1.SHW                                            *
  3. * Purpose....:  Sub program to PROMOTE1.SHW (tight loop for sound).   *
  4. ***********************************************************************
  5. MARK 1          * Set a mark to jump to
  6. SOUND G 4 70
  7. SOUND D 4 70
  8. INCREASE soundloop 1
  9. IFVARIABLE soundloop 8 DO JUMPMARK 2
  10. JUMPMARK 1      * If we've reached here, jump to mark 1
  11. MARK 2          * Set a mark to jump to
  12.